home *** CD-ROM | disk | FTP | other *** search
/ Mac Format 1994 August / August CD.bin / Shareware / Games / Core War / Battle Programs / contest89 / VAMP.RED < prev    next >
Text File  |  1991-08-12  |  936b  |  20 lines
  1. ;Warrior VAMP;by Stefan Roettger, D-8525 Uttenreuth
  2. ;
  3. ;
  4. start    spl  search             ;split program execution to main task
  5.          mov #0        start     ;initialize pointer to buffer
  6. cbuf     mov #1       <start     ;build a buffer containing #1
  7.          djn  cbuf     c         ;is the buffer big enough?
  8. c        dat #41                 ;counter and end for buffer task
  9. search   mov  bomb1   @p         ;bomb core with bomb1
  10.          add #18       p         ;skip 18
  11.          mov  bomb2   @p         ;bomb core with bomb2
  12.          add #23       p         ;skip 23
  13.          djn  search  @p         ;run into buffer?
  14.          mov #1       @p         ;repair damaged buffer
  15.          add #820      p         ;do not bomb own program
  16.          jmp  search             ;continue bombing
  17. bomb1    spl  0                  ;spl bomb to slow down opponent
  18. bomb2    jmp  -18                ;jmp bomb to confuse and kill
  19. p        dat #2048
  20.